home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Experimental BBS Explossion 3
/
Experimental BBS Explossion III.iso
/
msdos
/
aset10.zip
/
ASET5.TST
< prev
next >
Wrap
Text File
|
1993-05-06
|
1KB
|
59 lines
# $Id: aset5.tst 1.1 1993/03/09 13:01:25 Ricki Exp $
# Test file for ASETs interactive functions
#
# $Log: aset5.tst $
# Revision 1.1 1993/03/09 13:01:25 Ricki
# Initial revision
#
#
#-------GETKEY
#
# PRESS ANY KEY
a=getkey
a=getkey()
# PRESS ONE OF y,Y,n,N
a=getkey('yYnN')
#
a=getkey(1,2)
#
#-------GETNUM
#
# INPUT ANY NUMBER AND <ENTER>
a=getnum
a=getnum(3)
a=getnum(5,1.23)
a=getnum(6,1.24,25)
a=getnum(7,1.25,25,15)
#
a=getnum()
a=getnum(1,2,3,4,5)
#
#-------GETSTR
#
# INPUT ANY STRING AND <ENTER>
a=getstr
a=getstr(3)
a=getstr(5,'abc')
a=getstr(6,'abcd',25)
a=getstr(7,'abcde',25,15)
#
a=getstr()
a=getstr(1,2,3,4,5)
#
#-------LINE
#
# INPUT ANY STRING AND <ENTER>
a=getline
# TWO TIMES: INPUT ANY STRING AND <ENTER>
a=getline(2)
a=getline(1,'c:\autoexec.bat')
#
a=getline()
a=getline(1,2,3)
a=getline(1,'Z:\DOES\NOT\EXIST')